home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…tion Library 2 (Reseller) / Apple R&P Lib Reseller v2.0.iso / 3-Demos / Third Party Demos / Networking / MacMainFrame / card_23093.txt < prev    next >
Text File  |  1989-07-14  |  4KB  |  199 lines
  1. -- card: 23093 from stack: in
  2. -- bmap block id: 24398
  3. -- flags: 0000
  4. -- background id: 2776
  5. -- name: upload screen
  6. ----- HyperTalk script -----
  7. on openCard
  8.   set the userLevel to 3
  9.   choose select tool
  10.   click at 278,155
  11.   drag from 278,155 to 305,173
  12.   set dragSpeed to 400
  13.   drag from 305,173 to 305,187
  14.   wait 1 seconds
  15.   drag from 305,187 to 305,203
  16.   wait 2 seconds
  17.   show card field id 8
  18.   show card field id 9
  19.   put "105" into char 1 of card field id 6
  20.   put "105" into char 1 of card field id 7
  21.   drag from 305,203 to 305,220
  22.   add 125 to card field id 6
  23.   add 125 to card field id 7
  24.   wait 1 seconds
  25.   add 75 to card field id 6
  26.   add 75 to card field id 7
  27.   wait 1 seconds
  28.   add 40 to card field id 6
  29.   add 40 to card field id 7
  30.   wait 30 ticks
  31.   add 30 to card field id 6
  32.   add 30 to card field id 7
  33.   drag from 305,220 to 305,267
  34.   add 25 to card field id 6
  35.   add 25 to card field id 7
  36.   wait 1 seconds
  37.   drag from 305,267 to 305,285
  38.   wait 1 seconds
  39.   show card field id 10
  40.   choose browse tool
  41. end openCard
  42.  
  43.  
  44.  
  45. -- part 1 (button)
  46. -- low flags: 00
  47. -- high flags: 0002
  48. -- rect: left=7 top=308 right=336 bottom=45
  49. -- title width / last selected line: 0
  50. -- icon id / first selected line: 30557 / 30557
  51. -- text alignment: 1
  52. -- font id: 0
  53. -- text size: 12
  54. -- style flags: 0
  55. -- line height: 16
  56. -- part name: First
  57. ----- HyperTalk script -----
  58. on mouseUp
  59.   choose select tool
  60.   click at 278,265
  61.   drag from 278,265 to 305,285
  62.   set dragSpeed to 0
  63.   drag from 305,285 to 305,173
  64.   choose browse tool
  65.   subtract 400 from card field id 6
  66.   subtract 400 from card field id 7
  67.   hide card field id 8
  68.   hide card field id 9
  69.   hide card field id 10
  70.   visual effect scroll right
  71.   push card
  72.   go to card id 9514
  73.   set userLevel to 1
  74.   show menuBar
  75. end mouseUp
  76.  
  77.  
  78.  
  79. -- part 2 (button)
  80. -- low flags: 00
  81. -- high flags: 0002
  82. -- rect: left=469 top=309 right=337 bottom=506
  83. -- title width / last selected line: 0
  84. -- icon id / first selected line: 1012 / 1012
  85. -- text alignment: 1
  86. -- font id: 0
  87. -- text size: 12
  88. -- style flags: 0
  89. -- line height: 16
  90. -- part name: Return
  91. ----- HyperTalk script -----
  92. on mouseUp
  93.   choose select tool
  94.   click at 278,265
  95.   drag from 278,265 to 305,285
  96.   set dragSpeed to 0
  97.   drag from 305,285 to 305,173
  98.   choose browse tool
  99.   subtract 400 from card field id 6
  100.   subtract 400 from card field id 7
  101.   hide card field id 8
  102.   hide card field id 9
  103.   hide card field id 10
  104.   visual effect scroll left
  105.   pop card
  106.   set userLevel to 1
  107. end mouseUp
  108.  
  109.  
  110.  
  111. -- part 6 (field)
  112. -- low flags: 01
  113. -- high flags: 0000
  114. -- rect: left=162 top=177 right=195 bottom=234
  115. -- title width / last selected line: 0
  116. -- icon id / first selected line: 0 / 0
  117. -- text alignment: 0
  118. -- font id: 21
  119. -- text size: 12
  120. -- style flags: 0
  121. -- line height: 16
  122. -- part name: current file
  123.  
  124.  
  125. -- part 7 (field)
  126. -- low flags: 01
  127. -- high flags: 0000
  128. -- rect: left=162 top=197 right=214 bottom=231
  129. -- title width / last selected line: 0
  130. -- icon id / first selected line: 0 / 0
  131. -- text alignment: 0
  132. -- font id: 21
  133. -- text size: 12
  134. -- style flags: 0
  135. -- line height: 16
  136. -- part name: current file
  137.  
  138.  
  139. -- part 8 (field)
  140. -- low flags: 81
  141. -- high flags: 0000
  142. -- rect: left=43 top=96 right=114 bottom=169
  143. -- title width / last selected line: 0
  144. -- icon id / first selected line: 0 / 0
  145. -- text alignment: 0
  146. -- font id: 3
  147. -- text size: 12
  148. -- style flags: 0
  149. -- line height: 16
  150. -- part name: 
  151.  
  152.  
  153. -- part 9 (field)
  154. -- low flags: 81
  155. -- high flags: 0000
  156. -- rect: left=339 top=97 right=114 bottom=460
  157. -- title width / last selected line: 0
  158. -- icon id / first selected line: 0 / 0
  159. -- text alignment: 0
  160. -- font id: 3
  161. -- text size: 12
  162. -- style flags: 0
  163. -- line height: 16
  164. -- part name: 
  165.  
  166.  
  167. -- part 10 (field)
  168. -- low flags: 81
  169. -- high flags: 0001
  170. -- rect: left=162 top=261 right=282 bottom=201
  171. -- title width / last selected line: 0
  172. -- icon id / first selected line: 0 / 0
  173. -- text alignment: 0
  174. -- font id: 3
  175. -- text size: 12
  176. -- style flags: 0
  177. -- line height: 16
  178. -- part name: 
  179.  
  180.  
  181. -- part contents for card part 7
  182. ----- text -----
  183. 0
  184.  
  185. -- part contents for card part 8
  186. ----- text -----
  187. Installation hints
  188.  
  189. -- part contents for card part 9
  190. ----- text -----
  191. INSTALLA HINTS
  192.  
  193. -- part contents for card part 10
  194. ----- text -----
  195. 1
  196.  
  197. -- part contents for card part 6
  198. ----- text -----
  199. 0